/ PC/CD Gamer UK 123 / CD Gamer Issue 123 (June 2003) (Disc 1).ISO / Games / Dev_Demo_EU / data1.cab / App_Executables / System / DBrain.u / ScriptText5.TextBuffer

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 00 00 00 00 00 00 00 | 76 25 63 6c 61 73 73 20 |........|v%class |
|00000010| 44 54 65 72 72 4f 72 64 | 65 72 41 6c 61 72 6d 20 |DTerrOrd|erAlarm |
|00000020| 65 78 74 65 6e 64 73 20 | 44 53 74 61 6e 64 61 72 |extends |DStandar|
|00000030| 64 4f 72 64 65 72 73 3b | 0d 0a 0d 0a 76 61 72 20 |dOrders;|....var |
|00000040| 61 72 72 61 79 3c 44 41 | 6c 61 72 6d 50 6f 69 6e |array<DA|larmPoin|
|00000050| 74 3e 20 41 6c 61 72 6d | 50 6f 69 6e 74 73 3b 0d |t> Alarm|Points;.|
|00000060| 0a 76 61 72 20 62 6f 6f | 6c 20 62 53 65 74 74 69 |.var boo|l bSetti|
|00000070| 6e 67 41 6c 61 72 6d 3b | 0d 0a 0d 0a 66 75 6e 63 |ngAlarm;|....func|
|00000080| 74 69 6f 6e 20 62 6f 6f | 6c 20 53 68 6f 75 6c 64 |tion boo|l Should|
|00000090| 41 74 74 61 63 6b 28 20 | 44 50 6c 61 79 65 72 50 |Attack( |DPlayerP|
|000000a0| 61 77 6e 20 50 20 29 0d | 0a 7b 0d 0a 09 69 66 20 |awn P ).|.{...if |
|000000b0| 28 20 21 62 53 65 74 74 | 69 6e 67 41 6c 61 72 6d |( !bSett|ingAlarm|
|000000c0| 20 26 26 20 21 41 6c 61 | 72 6d 49 73 41 63 74 69 | && !Ala|rmIsActi|
|000000d0| 76 65 28 29 20 26 26 20 | 21 53 61 6d 65 54 65 61 |ve() && |!SameTea|
|000000e0| 6d 41 73 28 50 29 20 26 | 26 20 28 42 6f 74 2e 48 |mAs(P) &|& (Bot.H|
|000000f0| 65 61 6c 74 68 20 3c 20 | 31 30 30 20 7c 7c 20 50 |ealth < |100 || P|
|00000100| 6c 61 79 65 72 49 73 44 | 72 75 67 67 65 64 28 29 |layerIsD|rugged()|
|00000110| 20 7c 7c 20 44 69 73 74 | 61 6e 63 65 53 71 28 46 | || Dist|anceSq(F|
|00000120| 69 6e 64 4f 72 64 65 72 | 50 6f 69 6e 74 28 29 2c |indOrder|Point(),|
|00000130| 42 6f 74 29 20 3c 20 44 | 69 73 74 61 6e 63 65 53 |Bot) < D|istanceS|
|00000140| 71 28 50 2c 42 6f 74 29 | 29 20 29 0d 0a 09 7b 0d |q(P,Bot)|) )...{.|
|00000150| 0a 09 09 2f 2f 20 73 6f | 75 6e 64 20 61 6e 20 61 |...// so|und an a|
|00000160| 6c 61 72 6d 0d 0a 09 09 | 62 53 65 74 74 69 6e 67 |larm....|bSetting|
|00000170| 41 6c 61 72 6d 20 3d 20 | 54 52 55 45 3b 0d 0a 09 |Alarm = |TRUE;...|
|00000180| 09 42 6f 74 2e 43 6f 6d | 6d 65 6e 74 28 20 22 46 |.Bot.Com|ment( "F|
|00000190| 6f 72 63 69 6e 67 20 62 | 6f 74 20 74 6f 20 73 65 |orcing b|ot to se|
|000001a0| 74 20 74 68 65 20 61 6c | 61 72 6d 22 20 29 3b 0d |t the al|arm" );.|
|000001b0| 0a 09 09 42 6f 74 2e 53 | 77 69 74 63 68 53 74 61 |...Bot.S|witchSta|
|000001c0| 74 65 28 20 27 4f 72 64 | 65 72 41 6c 61 72 6d 27 |te( 'Ord|erAlarm'|
|000001d0| 20 29 3b 0d 0a 09 09 72 | 65 74 75 72 6e 20 46 41 | );....r|eturn FA|
|000001e0| 4c 53 45 3b 0d 0a 09 7d | 0d 0a 09 65 6c 73 65 0d |LSE;...}|...else.|
|000001f0| 0a 09 69 66 20 28 20 41 | 6c 61 72 6d 49 73 41 63 |..if ( A|larmIsAc|
|00000200| 74 69 76 65 28 29 20 29 | 0d 0a 09 7b 0d 0a 09 09 |tive() )|...{....|
|00000210| 42 6f 74 2e 43 6f 6d 6d | 65 6e 74 28 20 22 41 6c |Bot.Comm|ent( "Al|
|00000220| 61 72 6d 20 69 73 20 61 | 63 74 69 76 65 2c 20 61 |arm is a|ctive, a|
|00000230| 6c 6c 6f 77 20 6e 6f 72 | 6d 61 6c 20 63 6f 6d 62 |llow nor|mal comb|
|00000240| 61 74 22 20 29 3b 0d 0a | 09 09 62 53 65 74 74 69 |at" );..|..bSetti|
|00000250| 6e 67 41 6c 61 72 6d 20 | 3d 20 46 41 4c 53 45 3b |ngAlarm |= FALSE;|
|00000260| 0d 0a 09 7d 0d 0a 09 09 | 0d 0a 09 72 65 74 75 72 |...}....|...retur|
|00000270| 6e 20 54 52 55 45 3b 0d | 0a 7d 0d 0a 0d 0a 66 75 |n TRUE;.|.}....fu|
|00000280| 6e 63 74 69 6f 6e 20 50 | 6f 73 74 42 65 67 69 6e |nction P|ostBegin|
|00000290| 50 6c 61 79 28 29 0d 0a | 7b 0d 0a 09 6c 6f 63 61 |Play()..|{...loca|
|000002a0| 6c 20 44 41 6c 61 72 6d | 50 6f 69 6e 74 20 41 6c |l DAlarm|Point Al|
|000002b0| 61 72 6d 3b 0d 0a 09 0d | 0a 09 53 75 70 65 72 2e |arm;....|..Super.|
|000002c0| 50 6f 73 74 42 65 67 69 | 6e 50 6c 61 79 28 29 3b |PostBegi|nPlay();|
|000002d0| 0d 0a 09 0d 0a 09 66 6f | 72 65 61 63 68 20 41 6c |......fo|reach Al|
|000002e0| 6c 41 63 74 6f 72 73 28 | 20 63 6c 61 73 73 27 44 |lActors(| class'D|
|000002f0| 41 6c 61 72 6d 50 6f 69 | 6e 74 27 2c 20 41 6c 61 |AlarmPoi|nt', Ala|
|00000300| 72 6d 20 29 0d 0a 09 09 | 41 6c 61 72 6d 50 6f 69 |rm )....|AlarmPoi|
|00000310| 6e 74 73 5b 41 6c 61 72 | 6d 50 6f 69 6e 74 73 2e |nts[Alar|mPoints.|
|00000320| 4c 65 6e 67 74 68 5d 20 | 3d 20 41 6c 61 72 6d 3b |Length] |= Alarm;|
|00000330| 0d 0a 7d 0d 0a 0d 0a 66 | 75 6e 63 74 69 6f 6e 20 |..}....f|unction |
|00000340| 41 73 73 65 73 73 53 69 | 74 75 61 74 69 6f 6e 28 |AssessSi|tuation(|
|00000350| 29 0d 0a 7b 0d 0a 09 69 | 66 20 28 20 42 6f 74 2e |)..{...i|f ( Bot.|
|00000360| 45 6e 65 6d 79 3f 20 26 | 26 20 42 6f 74 2e 48 65 |Enemy? &|& Bot.He|
|00000370| 61 6c 74 68 20 3c 20 31 | 30 30 20 26 26 20 21 41 |alth < 1|00 && !A|
|00000380| 6c 61 72 6d 49 73 41 63 | 74 69 76 65 28 29 20 26 |larmIsAc|tive() &|
|00000390| 26 20 21 62 53 65 74 74 | 69 6e 67 41 6c 61 72 6d |& !bSett|ingAlarm|
|000003a0| 20 29 0d 0a 09 7b 0d 0a | 09 09 62 53 65 74 74 69 | )...{..|..bSetti|
|000003b0| 6e 67 41 6c 61 72 6d 20 | 3d 20 54 52 55 45 3b 0d |ngAlarm |= TRUE;.|
|000003c0| 0a 09 09 42 6f 74 2e 53 | 77 69 74 63 68 53 74 61 |...Bot.S|witchSta|
|000003d0| 74 65 28 20 27 4f 72 64 | 65 72 41 6c 61 72 6d 27 |te( 'Ord|erAlarm'|
|000003e0| 20 29 3b 0d 0a 09 7d 0d | 0a 7d 0d 0a 0d 0a 66 75 | );...}.|.}....fu|
|000003f0| 6e 63 74 69 6f 6e 20 62 | 6f 6f 6c 20 50 6c 61 79 |nction b|ool Play|
|00000400| 65 72 49 73 44 72 75 67 | 67 65 64 28 29 0d 0a 7b |erIsDrug|ged()..{|
|00000410| 0d 0a 09 6c 6f 63 61 6c | 20 44 47 61 6d 65 50 6c |...local| DGamePl|
|00000420| 61 79 65 72 20 50 6c 61 | 79 65 72 3b 0d 0a 09 6c |ayer Pla|yer;...l|
|00000430| 6f 63 61 6c 20 69 6e 74 | 20 69 3b 0d 0a 09 0d 0a |ocal int| i;.....|
|00000440| 09 50 6c 61 79 65 72 20 | 3d 20 44 47 61 6d 65 50 |.Player |= DGameP|
|00000450| 6c 61 79 65 72 28 4c 65 | 76 65 6c 2e 47 61 6d 65 |layer(Le|vel.Game|
|00000460| 2e 46 69 6e 64 48 75 6d | 61 6e 50 6c 61 79 65 72 |.FindHum|anPlayer|
|00000470| 28 29 29 3b 0d 0a 09 66 | 6f 72 20 28 20 69 20 3d |());...f|or ( i =|
|00000480| 20 30 3b 20 69 20 3c 20 | 50 6c 61 79 65 72 2e 4d | 0; i < |Player.M|
|00000490| 6f 64 69 66 69 65 72 73 | 2e 4c 65 6e 67 74 68 3b |odifiers|.Length;|
|000004a0| 20 69 2b 2b 20 29 0d 0a | 09 09 69 66 20 28 20 44 | i++ )..|..if ( D|
|000004b0| 53 79 72 69 6e 67 65 4d | 6f 64 69 66 69 65 72 28 |SyringeM|odifier(|
|000004c0| 50 6c 61 79 65 72 2e 4d | 6f 64 69 66 69 65 72 73 |Player.M|odifiers|
|000004d0| 5b 69 5d 29 3f 20 29 0d | 0a 09 09 09 72 65 74 75 |[i])? ).|....retu|
|000004e0| 72 6e 20 54 52 55 45 3b | 0d 0a 09 09 09 0d 0a 09 |rn TRUE;|........|
|000004f0| 72 65 74 75 72 6e 20 46 | 41 4c 53 45 3b 0d 0a 7d |return F|ALSE;..}|
|00000500| 0d 0a 0d 0a 66 75 6e 63 | 74 69 6f 6e 20 62 6f 6f |....func|tion boo|
|00000510| 6c 20 43 61 6e 44 72 75 | 67 50 6c 61 79 65 72 28 |l CanDru|gPlayer(|
|00000520| 29 0d 0a 7b 0d 0a 09 6c | 6f 63 61 6c 20 49 6e 76 |)..{...l|ocal Inv|
|00000530| 65 6e 74 6f 72 79 20 49 | 6e 76 3b 0d 0a 09 0d 0a |entory I|nv;.....|
|00000540| 09 66 6f 72 20 28 20 49 | 6e 76 20 3d 20 42 6f 74 |.for ( I|nv = Bot|
|00000550| 2e 49 6e 76 65 6e 74 6f | 72 79 3b 20 49 6e 76 3f |.Invento|ry; Inv?|
|00000560| 3b 20 49 6e 76 20 3d 20 | 49 6e 76 65 6e 74 6f 72 |; Inv = |Inventor|
|00000570| 79 2e 49 6e 76 65 6e 74 | 6f 72 79 20 29 0d 0a 09 |y.Invent|ory )...|
|00000580| 09 69 66 20 28 20 44 53 | 79 72 69 6e 67 65 28 49 |.if ( DS|yringe(I|
|00000590| 6e 76 29 3f 20 29 0d 0a | 09 09 09 72 65 74 75 72 |nv)? )..|...retur|
|000005a0| 6e 20 54 52 55 45 3b 0d | 0a 09 09 09 0d 0a 09 72 |n TRUE;.|.......r|
|000005b0| 65 74 75 72 6e 20 46 41 | 4c 53 45 3b 0d 0a 7d 0d |eturn FA|LSE;..}.|
|000005c0| 0a 0d 0a 66 75 6e 63 74 | 69 6f 6e 20 62 6f 6f 6c |...funct|ion bool|
|000005d0| 20 41 6c 61 72 6d 49 73 | 41 63 74 69 76 65 28 29 | AlarmIs|Active()|
|000005e0| 0d 0a 7b 0d 0a 09 6c 6f | 63 61 6c 20 69 6e 74 20 |..{...lo|cal int |
|000005f0| 69 3b 0d 0a 09 0d 0a 09 | 66 6f 72 20 28 20 69 20 |i;......|for ( i |
|00000600| 3d 20 30 3b 20 69 20 3c | 20 41 6c 61 72 6d 50 6f |= 0; i <| AlarmPo|
|00000610| 69 6e 74 73 2e 4c 65 6e | 67 74 68 3b 20 69 2b 2b |ints.Len|gth; i++|
|00000620| 20 29 0d 0a 09 09 69 66 | 20 28 20 41 6c 61 72 6d | )....if| ( Alarm|
|00000630| 50 6f 69 6e 74 73 5b 69 | 5d 2e 62 41 63 74 69 76 |Points[i|].bActiv|
|00000640| 61 74 65 64 20 26 26 20 | 28 41 6c 61 72 6d 50 6f |ated && |(AlarmPo|
|00000650| 69 6e 74 73 5b 69 5d 2e | 4f 77 6e 69 6e 67 54 65 |ints[i].|OwningTe|
|00000660| 61 6d 20 3d 3d 20 32 35 | 35 20 7c 7c 20 41 6c 61 |am == 25|5 || Ala|
|00000670| 72 6d 50 6f 69 6e 74 73 | 5b 69 5d 2e 4f 77 6e 69 |rmPoints|[i].Owni|
|00000680| 6e 67 54 65 61 6d 20 3d | 3d 20 42 6f 74 2e 4d 79 |ngTeam =|= Bot.My|
|00000690| 54 65 61 6d 28 29 29 20 | 29 0d 0a 09 09 09 72 65 |Team()) |).....re|
|000006a0| 74 75 72 6e 20 54 52 55 | 45 3b 0d 0a 09 09 0d 0a |turn TRU|E;......|
|000006b0| 09 72 65 74 75 72 6e 20 | 46 41 4c 53 45 3b 0d 0a |.return |FALSE;..|
|000006c0| 7d 0d 0a 0d 0a 66 75 6e | 63 74 69 6f 6e 20 41 63 |}....fun|ction Ac|
|000006d0| 74 6f 72 20 46 69 6e 64 | 4f 72 64 65 72 50 6f 69 |tor Find|OrderPoi|
|000006e0| 6e 74 28 29 0d 0a 7b 0d | 0a 09 6c 6f 63 61 6c 20 |nt()..{.|..local |
|000006f0| 69 6e 74 20 69 3b 0d 0a | 09 6c 6f 63 61 6c 20 66 |int i;..|.local f|
|00000700| 6c 6f 61 74 20 42 65 73 | 74 57 2c 20 57 3b 0d 0a |loat Bes|tW, W;..|
|00000710| 09 6c 6f 63 61 6c 20 44 | 41 6c 61 72 6d 50 6f 69 |.local D|AlarmPoi|
|00000720| 6e 74 20 41 6c 61 72 6d | 2c 20 42 65 73 74 3b 0d |nt Alarm|, Best;.|
|00000730| 0a 09 0d 0a 09 66 6f 72 | 20 28 20 69 20 3d 20 30 |.....for| ( i = 0|
|00000740| 3b 20 69 20 3c 20 41 6c | 61 72 6d 50 6f 69 6e 74 |; i < Al|armPoint|
|00000750| 73 2e 4c 65 6e 67 74 68 | 3b 20 69 2b 2b 20 29 0d |s.Length|; i++ ).|
|00000760| 0a 09 7b 0d 0a 09 09 41 | 6c 61 72 6d 20 3d 20 41 |..{....A|larm = A|
|00000770| 6c 61 72 6d 50 6f 69 6e | 74 73 5b 69 5d 3b 0d 0a |larmPoin|ts[i];..|
|00000780| 09 09 69 66 20 28 20 21 | 41 6c 61 72 6d 2e 49 73 |..if ( !|Alarm.Is|
|00000790| 41 76 61 69 6c 61 62 6c | 65 54 6f 28 42 6f 74 29 |Availabl|eTo(Bot)|
|000007a0| 20 29 0d 0a 09 09 09 63 | 6f 6e 74 69 6e 75 65 3b | ).....c|ontinue;|
|000007b0| 0d 0a 09 09 09 0d 0a 09 | 09 69 66 20 28 20 44 69 |........|.if ( Di|
|000007c0| 73 74 61 6e 63 65 28 41 | 6c 61 72 6d 2c 42 6f 74 |stance(A|larm,Bot|
|000007d0| 29 20 3e 20 32 30 30 30 | 20 29 0d 0a 09 09 09 63 |) > 2000| ).....c|
|000007e0| 6f 6e 74 69 6e 75 65 3b | 0d 0a 09 09 09 0d 0a 09 |ontinue;|........|
|000007f0| 09 57 20 3d 20 44 69 73 | 74 61 6e 63 65 28 41 6c |.W = Dis|tance(Al|
|00000800| 61 72 6d 2c 42 6f 74 29 | 2f 37 35 30 3b 0d 0a 09 |arm,Bot)|/750;...|
|00000810| 09 57 20 2b 3d 20 61 62 | 73 28 42 6f 74 2e 4c 6f |.W += ab|s(Bot.Lo|
|00000820| 63 61 74 69 6f 6e 2e 5a | 2d 41 6c 61 72 6d 2e 4c |cation.Z|-Alarm.L|
|00000830| 6f 63 61 74 69 6f 6e 2e | 5a 29 2f 31 30 30 3b 0d |ocation.|Z)/100;.|
|00000840| 0a 09 09 2f 2f 6c 6f 67 | 28 20 22 41 6c 61 72 6d |...//log|( "Alarm|
|00000850| 20 77 65 69 67 68 74 3a | 22 40 57 40 61 62 73 28 | weight:|"@W@abs(|
|00000860| 42 6f 74 2e 4c 6f 63 61 | 74 69 6f 6e 2e 5a 2d 41 |Bot.Loca|tion.Z-A|
|00000870| 6c 61 72 6d 2e 4c 6f 63 | 61 74 69 6f 6e 2e 5a 29 |larm.Loc|ation.Z)|
|00000880| 40 41 6c 61 72 6d 20 29 | 3b 0d 0a 09 09 69 66 20 |@Alarm )|;....if |
|00000890| 28 20 21 42 65 73 74 20 | 7c 7c 20 57 20 3c 20 42 |( !Best ||| W < B|
|000008a0| 65 73 74 57 20 29 0d 0a | 09 09 7b 0d 0a 09 09 09 |estW )..|..{.....|
|000008b0| 42 65 73 74 20 3d 20 41 | 6c 61 72 6d 3b 0d 0a 09 |Best = A|larm;...|
|000008c0| 09 09 42 65 73 74 57 20 | 3d 20 57 3b 0d 0a 09 09 |..BestW |= W;....|
|000008d0| 7d 0d 0a 09 7d 0d 0a 09 | 09 09 09 0d 0a 09 72 65 |}...}...|......re|
|000008e0| 74 75 72 6e 20 42 65 73 | 74 3b 0d 0a 7d 0d 0a 0d |turn Bes|t;..}...|
|000008f0| 0a 66 75 6e 63 74 69 6f | 6e 20 62 6f 6f 6c 20 53 |.functio|n bool S|
|00000900| 65 74 4f 72 64 65 72 73 | 53 74 61 74 65 28 20 6f |etOrders|State( o|
|00000910| 75 74 20 6e 61 6d 65 20 | 4f 72 64 65 72 73 53 74 |ut name |OrdersSt|
|00000920| 61 74 65 2c 20 6f 75 74 | 20 6e 61 6d 65 20 4f 72 |ate, out| name Or|
|00000930| 64 65 72 73 4c 61 62 65 | 6c 20 29 0d 0a 7b 0d 0a |dersLabe|l )..{..|
|00000940| 09 4f 72 64 65 72 73 53 | 74 61 74 65 20 3d 20 27 |.OrdersS|tate = '|
|00000950| 42 6f 72 65 64 27 3b 0d | 0a 09 4f 72 64 65 72 73 |Bored';.|..Orders|
|00000960| 4c 61 62 65 6c 20 3d 20 | 27 27 3b 0d 0a 09 72 65 |Label = |'';...re|
|00000970| 74 75 72 6e 20 54 52 55 | 45 3b 0d 0a 7d 0d 0a 00 |turn TRU|E;..}...|
+--------+-------------------------+-------------------------+--------+--------+